home *** CD-ROM | disk | FTP | other *** search
/ Network CD 1 / Network CD.iso / amospd / 561-570 / apd565 / turbo_packer.amos / turbo_packer.amosSourceCode < prev   
AMOS Source Code  |  1990-11-28  |  21KB  |  122 lines
  1. '
  2. '                             TURBO PACKER 
  3. '                             ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ 
  4. '                            By Jason Chan.
  5. '                    
  6. '                     BAMBOO SOFTWARE - MARCH 1992 
  7. Do : ZNS : Loop 
  8. Procedure TURBO_PACKER_VERSION_2_BY_JASON_CHAN_APRIL_1992
  9. End Proc
  10. Procedure ZNS
  11.    Unpack 3 To 1 : Paper 0 : Cmove 1,20
  12.    Reserve Zone 3
  13.    Set Zone 1,58,74 To 158,92
  14.    Set Zone 2,184,74 To 283,92
  15.    Set Zone 3,143,177 To 187,193
  16.    Do 
  17.       Z=Mouse Zone : C=Mouse Click
  18.       If Z=1 and C=1 Then _COMPILED : Exit 
  19.       If Z=2 and C=1 Then SAI : Exit 
  20.       If Z=3 and C=1 Then Edit 
  21.    Loop 
  22. End Proc
  23. Procedure SAI
  24.    F$=Fsel$("","","Enter Icon Bank To Load")
  25.    If ï¿½$ Extension_0_BFA2 Extension_0_2026 Extension_0_3000 Extension_0_0AC6 Extension_0_073C Extension_0_0200 
  26.    Load Extension_0_0106 Extension_0_0080 Extension_0_05C2 Extension_0_66E0 $
  27.    If Extension_0_0148 Extension_0_0076 Illegal_Constant_003F#=0 Then Pop Proc
  28.    MXCG
  29.    Centre Extension_0_05A2 Extension_0_02D3 Extension_0_4C94 Extension_0_6C11 Extension_0_65AA Extension_0_201B Extension_0_66CA Extension_0_4976 Extension_0_6F63 Extension_0_7327 Extension_0_3A02 Extension_0_FFC7 Str$ Extension_0_8074 Extension_0_4006 Extension_0_6006 Extension_0_1600 Extension_0_7578 Extension_0_9563 Extension_0_6D00 Extension_0_837C Extension_0_C1D4 Extension_0_32D0 Extension_0_F034 Extension_0_0802 Extension_0_F350 Extension_0_9C84 Extension_0_2260 Extension_0_E181 
  30.    Repeat Extension_0_E863 
  31.       Input Extension_0_3C36 Xgr Extension_0_5670 Put Bob Extension_0_75E3 Extension_0_4614 Extension_0_2027 Extension_0_6891 Extension_0_6344 Extension_0_207F Extension_0_636A Extension_0_6E23 Extension_0_3F26 Extension_0_0067 ï¿½T9C�$
  32.       ï¿½ï¿½Y    C2�,�3���P�J�O�
  33.    Until ï¿½W�C# Extension_0_8F8E Extension_0_683E Extension_0_DC00 Extension_0_9A01 Extension_0_CA58 Extension_0_FA86 Extension_0_12D2 Extension_0_7FA0 Extension_0_3624 Extension_0_CB0B Extension_0_3C34 Extension_0_10E4 Extension_0_9C59 Extension_0_CA68 Extension_0_1B15 Extension_0_9FF1 Extension_0_B220 Extension_0_43E6 Extension_0_3273 
  34.    Repeat Extension_0_3F8C 
  35.       Input Extension_0_3E60 Extension_0_3FF9 Extension_0_45D9 Extension_0_6468 Extension_0_4150 Extension_0_2065 Extension_0_686E Extension_0_636C Extension_0_204B Extension_0_E36E Extension_0_2E21 Extension_0_DF21 Extension_0_7065 Extension_0_9807 Extension_0_4419 Extension_0_A403 Extension_0_946F Extension_0_81E2 Extension_0_33C1 Extension_0_1A75 Extension_0_B723 Extension_0_3821 Extension_0_ED43 Extension_0_3104 Extension_0_5F53 
  36.       PH|���QF����҈2���S�|��=�!\Q���ĻL<PF�
  37.    Until Extension_0_7115 Extension_0_A996 Extension_0_CAC4 Extension_0_BB4C Extension_0_3C70 Extension_0_4688 Extension_0_72CA Extension_0_DAA4 Extension_0_62C1 Extension_0_B7A8 Extension_0_AA20 Extension_0_0D09 Extension_0_5D33 Extension_0_D846 Extension_0_9599 Extension_0_4A50 Extension_0_2325 Extension_0_77FF Extension_0_E224 Extension_0_ABE4 Extension_0_1D08 Extension_0_713F Extension_0_BB89 Extension_0_E246 Extension_0_9B95 Extension_0_1654 Extension_0_AB88 Extension_0_E644 
  38.    Repeat Extension_0_7B9F 
  39.       Input Extension_0_C59E Extension_0_62E8 Extension_0_F15B Extension_0_25FB Extension_0_78CF Extension_0_1630 Extension_0_E10E Extension_0_BFF6 Extension_0_0FD2 Extension_0_240D Extension_0_DB4E Extension_0_6BD9 Extension_0_1A49 Extension_0_FF31 Extension_0_0FAE Extension_0_83C1 Extension_0_2C05 Extension_0_B03F Extension_0_F0CC Extension_0_E8DE Extension_0_E38E Extension_0_1CF5 Extension_0_5869 Extension_0_8684 
  40.       ^��D�V+�?K��DE�#_P��Ը�"#
  41.       ;4��\�
  42. �J.J52>���C�C5����T�5U�H��GS�詼WF�W��W��<9��J���Ձ�[-G�َU��}�
  43. D8$�A8     W�    ï¿½ï¿½ï¿½V-��F0
  44.       While Extension_0_A667 Extension_0_73C7 Extension_0_E8A9 Extension_0_BC77 Extension_0_46CC Extension_0_77D5 Extension_0_EFB4 Extension_0_57CF Extension_0_10C5 Extension_0_3C39 Extension_0_A4C3 Anim Freeze Extension_0_9E96 Extension_0_BAD5 Extension_0_81EB Extension_0_5B2D Extension_0_6703 Extension_0_FBD9 Extension_0_8E55 Extension_0_C114 Extension_0_AF7D Extension_0_F3BB 
  45.          Inc Extension_0_3824 Extension_0_8C41 Extension_0_3809 Extension_0_0B77 Extension_0_1DE3 Extension_0_09A2 Extension_0_F3B4 Extension_0_CA76 Extension_0_2D1E Extension_0_10B4 Extension_0_E846 Extension_0_30C1 Ror.w Extension_0_111D Extension_0_8AB4 Extension_0_A75A Extension_0_D839 Extension_0_912C Extension_0_CBB9 Extension_0_24DF Extension_0_125F 
  46.       Wend Extension_0_096E 
  47.    Until Extension_0_07BF Extension_0_026D Extension_0_04DF Extension_0_EE9E Extension_0_2DD8 Extension_0_8E38 Extension_0_4FB3 Extension_0_5830 Extension_0_E405 Extension_0_5202 Extension_0_EF03 
  48.    Repeat Extension_0_16C0 
  49.       Input Extension_0_9B06 Extension_0_46AE Extension_0_67D6 Extension_0_E7C9 Extension_0_2A76 Extension_0_2638 Extension_0_1840 Extension_0_AF54 Extension_0_31E0 Extension_0_0422 Extension_0_0302 Extension_0_DCDC Extension_0_641B Extension_0_1181 Extension_0_9066 Extension_0_7299 Extension_0_46FD Extension_0_CE3B Extension_0_2168 Extension_0_FF85 Extension_0_0E5F Extension_0_1FB1 Extension_0_F703 Extension_0_A2F9 Extension_0_60E9 Extension_0_F0DD Extension_0_278E Extension_0_3691 Extension_0_D96D Extension_0_B504 
  50.       ï¿½ï¿½ï¿½ï¿½G�AV}ND\�/B�# Extension_0_EAB3 Extension_0_7C24 Extension_0_5FE4 
  51.    Until Extension_0_3114 Extension_0_7BFB Extension_0_9ADD Extension_0_A031 Extension_0_1403 Extension_0_71B9 Extension_0_F7EB Extension_0_1DE1 Extension_0_866E Extension_0_40FB Extension_0_1FE5 Extension_0_10C9 Extension_0_9864 Extension_0_C211 Extension_0_8461 Extension_0_2469 Extension_0_BB82 Extension_0_8BEB Extension_0_965E Extension_0_FD10 Extension_0_ED98 Extension_0_92C4 
  52.    If Extension_0_3C75 Extension_0_2E1A Extension_0_9114 Extension_0_3EE4 Extension_0_4B28 Extension_0_7325 Extension_0_6711 Extension_0_5C66 Extension_0_23E4 Extension_0_1111 Extension_0_1D7F Extension_0_A045 Extension_0_4661 Extension_0_216E Extension_0_37BA Extension_0_1801 Extension_0_05E1 Extension_0_826E Extension_0_40FD Extension_0_20BD 
  53.    Repeat Extension_0_B826 
  54.       SV�WGU���V����{�$�Լ��E�#X�\�^�WY��)_��8ߜ#
  55.    Until Extension_0_C45E Extension_0_E7AC Extension_0_7712 Extension_0_59CE Extension_0_EBAF Extension_0_295F Extension_0_DE08 Extension_0_13BF Extension_0_381F Extension_0_03DF Extension_0_9C00 Extension_0_3594 Extension_0_42BD Extension_0_30CF 
  56.    Centre Extension_0_9800 Extension_0_3C00 Extension_0_9233 Extension_0_6D38 Extension_0_79D2 Extension_0_5D24 Extension_0_E509 Extension_0_AB77 Extension_0_C5B6 Extension_0_4CFA Extension_0_E6E2 Extension_0_FC73 
  57.    Screen Open Extension_0_EA66 Extension_0_1D14 Extension_0_9B8A Extension_0_C699 Extension_0_E15B Extension_0_10D3 Extension_0_9928 Extension_0_C580 Extension_0_62D0 Extension_0_1F37 Extension_0_8852 Extension_0_5DE3 Extension_0_6678 Extension_0_4F1B Extension_0_3C99 Extension_0_93DE Extension_0_F513 Extension_0_44B2 Extension_0_6287 Extension_0_17CD Extension_0_08A7 Extension_0_0486 Extension_0_9629 Extension_0_4160 Extension_0_6B72 Extension_0_107D Menu Bar Extension_0_0C10 Extension_0_860F 
  58.    Flash Off Extension_0_5F50 Extension_0_FC24 Extension_0_D043 
  59.    Paper Extension_0_A81E Extension_0_FC10 Extension_0_2608 Extension_0_B550 Extension_0_E950 Extension_0_A4FD Extension_0_7E60 Extension_0_96D1 Extension_0_5D3C Extension_0_F67C Extension_0_973A 
  60.    Ð´_�4�S��D��"�ƢOSM~����Z/�;D<�¾UGR����:�%E��O-䒰J4_���K�$��F�]��U��I�K�UĬ�BBQ
  61. �W���W��CR"�K�Z�AF�ͦ˸V4
  62. �Yύ���B
  63. $
  64.    For Extension_0_BE55 Extension_0_6772 Extension_0_F19C Extension_0_D4CE Extension_0_9A85 Extension_0_F28C Extension_0_3ACB Extension_0_2565 Extension_0_96C2 Extension_0_4F2D Extension_0_E492 Extension_0_B04A Extension_0_345F Extension_0_85D1 Extension_0_D94B Extension_0_D924 
  65.       If Extension_0_D65D Extension_0_AA86 Extension_0_55AE Extension_0_8849 Extension_0_F26B Extension_0_8975 Extension_0_C4AC Extension_0_18AF Extension_0_4242 Extension_0_710A Extension_0_EB77 Extension_0_BEB2 Extension_0_9F15 Extension_0_57DC Extension_0_EA43 Extension_0_5222 Extension_0_D54B Extension_0_9F01 Extension_0_5A92 Extension_0_6146 Extension_0_92CD Extension_0_A613 Extension_0_CBB8 Extension_0_5634 
  66.          Cls Extension_0_7904 Extension_0_CF8D Extension_0_A6C7 Extension_0_F362 
  67.          ï¿½|�L�M �Z�͆��]U��LW5
  68.  
  69.          <��APTȧC�R����&YV�ٌ}Dž#��EZ���?��=�\��L�EMM�7^{���~����-XN��{�7�W����#
  70.          If Extension_0_49C5 Extension_0_2F92 Extension_0_9670 Extension_0_13AB Extension_0_4B88 Extension_0_ECD4 Extension_0_B965 Extension_0_449C Extension_0_A24E Extension_0_F325 
  71.             Paste Icon Extension_0_FFAB Extension_0_745B Extension_0_A66C Extension_0_D74A Extension_0_D7B7 Extension_0_6CC3 Extension_0_B5A6 Extension_0_468F Extension_0_A2EE Extension_0_D32E Extension_0_EBDA Extension_0_9AD3 Extension_0_FA2A 
  72.             Erase Extension_0_7EF3 Extension_0_BED5 Extension_0_E6DF Extension_0_1219 Extension_0_56A3 Extension_0_77E9 Extension_0_9663 Extension_0_CF54 Extension_0_1FF9 Extension_0_124A Extension_0_891F Extension_0_4F91 Extension_0_BE39 Extension_0_D7A9 Extension_0_D989 Extension_0_540E Extension_0_9065 Extension_0_5764 Extension_0_8A0A Extension_0_1444 Extension_0_8BFE Extension_0_4C8F Extension_0_26A9 Extension_0_71D7 Extension_0_C7E6 Extension_0_6C05 Extension_0_B66A Extension_0_4935 Extension_0_2BD5 Extension_0_3645 Extension_0_0988 Extension_0_07B7 Extension_0_F4B0 Extension_0_47B8 Extension_0_2794 Extension_0_B0DB Extension_0_CA2C Extension_0_9F4F Extension_0_5E0B 
  73.             Add Extension_0_5902 Extension_0_34FA Extension_0_BFC3 Extension_0_3793 Extension_0_8B0A Extension_0_F7C8 Extension_0_58B8 Extension_0_2CFE Extension_0_F22F Extension_0_591A Extension_0_63C6 Extension_0_5445 Extension_0_D552 Extension_0_52E1 Extension_0_D548 and Extension_0_9F8E 
  74.             Add Extension_0_CCC1 Extension_0_D9DA Arexx Close Extension_0_D79A Extension_0_968D Extension_0_BE9A Extension_0_B5AF Extension_0_FFCE Extension_0_24B9 Extension_0_B67F Extension_0_F94B Extension_0_2597 Extension_0_40C4 Extension_0_C61C Extension_0_0BA9 Extension_0_8EBA Extension_0_C35D Extension_0_1396 Extension_0_F00A Extension_0_27D1 Extension_0_BDD1 Extension_0_4A16 Extension_0_6CF5 Extension_0_56C3 Extension_0_A62C Extension_0_DFA7 Extension_0_DE61 Extension_0_392F Extension_0_61E4 Extension_0_E92B Extension_0_A3FE Extension_0_A14E 
  75.             If Extension_0_38D2 Extension_0_6C1C Extension_0_FC3D Extension_0_3875 Extension_0_9033 Extension_0_F1CB Extension_0_49E9 Extension_0_69B0 Extension_0_9C91 Extension_0_5194 Extension_0_2576 
  76.                .�3����-4$�O���<�2���C�`]�PF#DS�O;Z��=�" #
  77.             End If Extension_0_E73C 
  78.             If Extension_0_99F7 Extension_0_43B5 Extension_0_605D Extension_0_8450 Extension_0_4623 Extension_0_4453 Extension_0_E64F Extension_0_3B0E Extension_0_7AEE Extension_0_E33D Extension_0_DE22 
  79.                ï¿½ï¿½C[M��$��J��چH
  80. ��D�!�F��!(�"�PH �J��YÏ|ɖ���DE?T���
  81. ���+��O�O�$�#
  82.             End If Extension_0_8648 
  83.          End If Extension_0_C164 
  84.       End If Deek
  85.    Next Extension_0_B0CB 
  86.    Reserve As Data Extension_0_C822 Extension_0_A450 Extension_0_680B Extension_0_8B6A Extension_0_A1EF Extension_0_59C3 Extension_0_8F7C Extension_0_C996 Extension_0_A7B0 Extension_0_B864 Extension_0_1B45 Extension_0_0511 Extension_0_3F54 Extension_0_E4DA Extension_0_1789 Screen Hide Extension_0_04A5 Extension_0_EC2B Extension_0_AACB Extension_0_4FD4 Extension_0_4F08 Extension_0_F805 Extension_0_241E Extension_0_B615 Extension_0_00CE Extension_0_DBBF Extension_0_B2C1 Extension_0_FB23 Extension_0_DFB0 
  87.    =�L���F�L B�VԷ�:T��"����3�&���M�I<�.?�`7� � L<���N��@����V��%�S�TEM��ߪ��T���IM=�{�RQ���
  88. G�V�P�O�� M���M
  89.    For Extension_0_FF06 Extension_0_6EDA Extension_0_D540 Extension_0_95A0 Extension_0_8DF2 Extension_0_A956 Extension_0_B494 Extension_0_25CB Extension_0_1D73 Extension_0_F974 Extension_0_454D Extension_0_A8A4 Extension_0_DFAA Extension_0_B2C8 Extension_0_1B54 Extension_0_B6EA 
  90.       If Extension_0_3DF8 Extension_0_1115 Extension_0_7BE6 Extension_0_5251 Extension_0_D9E5 Extension_0_1712 Extension_0_089C Extension_0_0A47 Extension_0_F556 Extension_0_D670 Extension_0_0E88 Extension_0_4F94 Extension_0_D820 Extension_0_6DA9 Extension_0_B418 Extension_0_B51C Extension_0_6DF4 Extension_0_4B47 Extension_0_A7BF Extension_0_5053 Extension_0_CC06 Extension_0_BDF7 Extension_0_0ACA Extension_0_3DE7 
  91.          Cls Extension_0_994C Extension_0_454B Extension_0_A2A4 Extension_0_6ED2 
  92.          ï¿½ï¿½QZ1;��� �K�G5
  93.  
  94.          ï¿½ï¿½ï¿½N    Ôµï¿½J'|��.A��ͱ�V̔]���T�'�!��    ï¿½~���E�O��;�U�;�VG�# Extension_0_54CC Extension_0_0145 Extension_0_FA9F Extension_0_B1BA Extension_0_4AEE Extension_0_92FA Extension_0_4B47 Extension_0_EFC1 Extension_0_9C53 Extension_0_A868 Extension_0_2354 Extension_0_35F4 Extension_0_79E7 Extension_0_8B76 Extension_0_DE37 Extension_0_E524 
  95.          If Extension_0_77CD Extension_0_EFD6 Extension_0_1EF2 Extension_0_D694 Extension_0_2290 Extension_0_9E28 Extension_0_91D9 Extension_0_D852 Extension_0_3C6B Extension_0_1214 
  96.             Paste Icon Kill Extension_0_7C87 Extension_0_81C2 Extension_0_43BF Extension_0_E1AE Extension_0_30C8 Dialog Update Extension_0_9DAE Extension_0_5A1F Extension_0_6747 Extension_0_F08F Extension_0_2740 Extension_0_6CA0 
  97.             Erase Extension_0_71D6 Extension_0_7960 Extension_0_F2F4 Extension_0_D7AD Extension_0_3A6D Extension_0_1E8E Extension_0_FF1D Extension_0_BBEB Extension_0_D155 Extension_0_2B7C Extension_0_EBCA Extension_0_B6DA Extension_0_5BDB Extension_0_ED7E Extension_0_B173 Extension_0_59AD Extension_0_E253 Extension_0_D01D Extension_0_3667 Extension_0_088D Extension_0_719B Extension_0_8B5C Extension_0_44B3 Extension_0_E2F8 Extension_0_B378 Extension_0_D8AC Extension_0_3459 Extension_0_1A2F Extension_0_156A Extension_0_859F Extension_0_42DD Extension_0_6162 Extension_0_0389 Extension_0_E9E5 Extension_0_0C2B Extension_0_0A5B Extension_0_850A Fade Extension_0_E0C2 
  98.             MW�Z��&͕��G呰XU��M�[�R�SZ��_���?U�4�O!�����LV�G17Z{���J>�~�� 
  99. 6���`�A�Q��AL�R�@�'A�������="����%�+!�5Y����)F�NSX$�<�E�S������8.��.��˗Q�����}όI�3�PI���.�I��"���AC'!� D|T}��3,��LPD)L,V��GY�,�H��Ɣܓ�س
  100.             Doke Extension_0_7B9C Extension_0_9CB5 Extension_0_4A3E Extension_0_847E Extension_0_B7EF Extension_0_1919 Extension_0_0C17 Screen Offset Extension_0_059C Extension_0_F89C Extension_0_60BE Extension_0_6106 Extension_0_EB71 Extension_0_BFDD Extension_0_614C Extension_0_B072 Extension_0_F805 Extension_0_1440 Extension_0_9801 Extension_0_2761 Extension_0_D2ED Extension_0_94C0 Extension_0_EF1C Extension_0_93AC Extension_0_A104 Extension_0_3D22 Extension_0_B28E Extension_0_C8C5 Extension_0_25A2 
  101.             Loke Extension_0_1235 Extension_0_79B2 Extension_0_8B8C Extension_0_A729 Extension_0_4683 Extension_0_6E53 Extension_0_5806 Extension_0_241C Extension_0_F63C Extension_0_C765 Extension_0_CC73 Extension_0_8EB5 Extension_0_C9E7 Extension_0_EDF3 Extension_0_8C38 Extension_0_2E1C Extension_0_ACE2 Extension_0_2E1D Extension_0_B8FD Extension_0_CB97 Extension_0_1E71 Extension_0_971C Extension_0_A8DD Extension_0_03BF Extension_0_C87D Extension_0_19CF Extension_0_8C69 Extension_0_C633 Extension_0_E4B1 Extension_0_5069 Extension_0_070E Extension_0_84F9 Extension_0_C22E Extension_0_E169 Extension_0_11B5 Extension_0_C41B Title Top Extension_0_060E Extension_0_BD0F Extension_0_C1F9 Extension_0_6143 
  102.             Copy Put Cblock Extension_0_0844 Extension_0_7C1E Extension_0_0654 Extension_0_070E Extension_0_7DF2 Extension_0_EF33 Extension_0_2CEF Extension_0_E06C Extension_0_7044 Extension_0_294C Extension_0_2C76 Extension_0_9607 Extension_0_DD47 Extension_0_7980 Extension_0_2CB7 Extension_0_4812 Extension_0_F8D0 Extension_0_C694 Extension_0_1ADC Extension_0_93C2 Extension_0_D8B3 Extension_0_1DA4 Extension_0_127B Extension_0_3F38 Extension_0_E5FB Extension_0_A134 Extension_0_8BE5 Extension_0_91EF Extension_0_48AC Extension_0_6C1A Extension_0_8EBA Extension_0_3939 Extension_0_44FD Extension_0_D7A2 Extension_0_A2E1 Extension_0_A593 
  103.             Add Extension_0_F63E Extension_0_6798 Extension_0_D29E Extension_0_0F39 Extension_0_F446 Extension_0_A291 Extension_0_A7A7 Extension_0_72D0 Set Sprite Buffer Extension_0_8DBF Extension_0_C785 Extension_0_A3F9 Extension_0_101A Extension_0_7645 Extension_0_676C Extension_0_0A2A Extension_0_831B 
  104.          End If Extension_0_C28C 
  105.       End If Extension_0_E346 
  106.    Next Extension_0_B3E5 
  107.    Screen Extension_0_38CD Extension_0_77F8 Extension_0_CA0D Extension_0_1D52 Extension_0_7697 Extension_0_266B Extension_0_9E20 Extension_0_9512 Extension_0_A77C Extension_0_6C74 Extension_0_6A78 Extension_0_937F Extension_0_E2AA Extension_0_81F5 Extension_0_EDF3 Extension_0_E875 Extension_0_7FAE Extension_0_6DD4 Extension_0_A5D8 Extension_0_E1AD Extension_0_BDA2 Extension_0_4125 Extension_0_788C Extension_0_8C79 Extension_0_CA25 Extension_0_A343 Extension_0_D36E Extension_0_4476 Extension_0_D6DF Extension_0_B90C Extension_0_3519 
  108.    Centre Extension_0_9AAB Extension_0_F74C Extension_0_F6C3 Extension_0_24D4 Extension_0_938B Extension_0_C88C Extension_0_82F6 Extension_0_9FDD Extension_0_A26F Extension_0_ECCE Extension_0_34D9 Extension_0_1ED1 Extension_0_8F64 Extension_0_436B Extension_0_819F Extension_0_D5D3 Extension_0_58CE Extension_0_9369 Extension_0_7A0D Extension_0_FF1B Extension_0_1BAB Extension_0_E9AB Extension_0_A5C2 Extension_0_CDC0 Extension_0_2858 Extension_0_330C Extension_0_C716 Extension_0_B9BD Extension_0_E6C7 Extension_0_3EEA Extension_0_08B7 Extension_0_BDFD Extension_0_C275 Extension_0_DD42 Extension_0_B7ED Extension_0_B9C6 Extension_0_2C2B Extension_0_897E Extension_0_BF6D Extension_0_ED9F Extension_0_4A6F Zdialog Extension_0_77D5 Extension_0_9AA8 
  109.    Centre Extension_0_7B12 Extension_0_E361 Extension_0_5D98 Extension_0_8AC7 Extension_0_62DF Extension_0_21A5 Extension_0_6A11 Extension_0_E5B6 Extension_0_3F3B Extension_0_25BA Extension_0_B065 Extension_0_481F Extension_0_6C71 Extension_0_1806 Extension_0_E772 Extension_0_25FD Extension_0_0B40 Extension_0_531C Extension_0_D730 Screen Extension_0_0A6A Extension_0_A71D Extension_0_7ECB Extension_0_C1DF Extension_0_1A9B Extension_0_BC11 Extension_0_1F70 Extension_0_AC58 Extension_0_14FF Extension_0_D216 Extension_0_2DB5 Extension_0_7567 Extension_0_47AB Extension_0_2158 Extension_0_0F9F Extension_0_71AC Extension_0_E2AD Extension_0_C1AB Extension_0_E73E Extension_0_0227 Extension_0_98AE Extension_0_C431 Extension_0_9DBA Extension_0_5399 Extension_0_5BED Extension_0_37C6 
  110.    ÇˆH�Q�4'VN�4��"���X��2��C��    ï¿½ï¿½ï¿½ï¿½ï¿½XM2�H(�A������@H=� � ��#
  111.    If Extension_0_4711 Extension_0_A188 Extension_0_5146 Extension_0_CEE2 Extension_0_AB35 Extension_0_2A4E Extension_0_9734 Extension_0_CA9A 
  112.       Save Extension_0_E6B9 Extension_0_FEFE Extension_0_7AB3 Extension_0_C2D9 Extension_0_D681 Extension_0_6729 Extension_0_BDD4 Extension_0_20CD Extension_0_F789 Extension_0_BEFF Extension_0_1F3F Extension_0_369C 
  113.    End If Extension_0_095E 
  114.    Erase Extension_0_BFD7 Extension_0_41F5 Extension_0_3F78 Extension_0_10FB Extension_0_B9A8 Extension_0_5C23 Extension_0_A251 Extension_0_D71E Extension_0_9AE1 Extension_0_FAAB Extension_0_24E1 Extension_0_A343 Extension_0_F0D6 Extension_0_6742 Extension_0_D4AA Extension_0_7C53 Extension_0_4D1F Extension_0_95C6 Extension_0_A5DA Extension_0_E29F 
  115.    If Extension_0_58AF Extension_0_E497 Extension_0_F4DB Extension_0_F942 Extension_0_20FB Extension_0_48CD Extension_0_0245 Extension_0_D7AC Extension_0_253F Extension_0_129F Extension_0_0B98 Extension_0_A771 Extension_0_41CB Extension_0_6379 Extension_0_30AB Extension_0_B8AA Extension_0_7C1B Extension_0_DE13 Extension_0_F11D Extension_0_988F 
  116. End Proc Extension_0_4BC6 
  117. Procedure CB
  118.   Home : Cmove 1,20 : Curs Off : Ink 0 : Bar 0,159 To 320,170
  119. End Proc
  120. Procedure _COMPILED
  121.    ' COMPILED PROCEDURE -- can't convert this to AMOS code
  122. End Proc